perm filename CSCA1.SCR[HHA,LCS] blob
sn#433838 filedate 1979-04-18 generic text, type T, neo UTF8
FUNC FUN; < F1, F2, F3, F4, F5, F6
COMMON TOOT TOOT CLAR BRIT BUZZ;
COMMON REVRB;
< CSCA1.SCR -- RANDOM NUMBER= 1
PLAY;
REVRB 0.000 11.000
;PRINT P1;< REVRB 1
CLAR 0.000 0.500 C 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 1
BUZZ 0.000 0.500 C 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 1
CLAR 0.500 0.250 D 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 2
BUZZ 0.500 0.250 B/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 2
CLAR 0.750 0.250 E 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 3
BUZZ 0.750 0.250 A/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 3
CLAR 1.000 0.250 F 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 4
BUZZ 1.000 0.250 G/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 4
CLAR 1.250 0.250 G 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 5
BUZZ 1.250 0.250 F/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 5
CLAR 1.500 0.250 A 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 6
BUZZ 1.500 0.250 E/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 6
CLAR 1.750 0.250 B 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 7
BUZZ 1.750 0.250 D/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 7
CLAR 2.000 0.500 C*2 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 8
BUZZ 2.000 0.500 C/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 8
CLAR 2.500 0.250 B 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 9
BUZZ 2.500 0.250 D/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 9
CLAR 2.750 0.250 A 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 10
BUZZ 2.750 0.250 E/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 10
CLAR 3.000 0.250 G 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 11
BUZZ 3.000 0.250 F/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 11
CLAR 3.250 0.250 F 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 12
BUZZ 3.250 0.250 G/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 12
CLAR 3.500 0.250 E 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 13
BUZZ 3.500 0.250 A/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 13
CLAR 3.750 0.250 D 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 14
BUZZ 3.750 0.250 B/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 14
CLAR 4.000 0.500 C 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 15
BUZZ 4.000 0.500 C 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 15
CLAR 4.500 0.250 D 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 16
BUZZ 4.500 0.250 B/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 16
CLAR 4.750 0.250 E 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 17
BUZZ 4.750 0.250 A/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 17
CLAR 5.000 0.250 F 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 18
BUZZ 5.000 0.250 G/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 18
CLAR 5.250 0.250 G 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 19
BUZZ 5.250 0.250 F/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 19
CLAR 5.500 0.250 A 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 20
BUZZ 5.500 0.250 E/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 20
CLAR 5.750 0.250 B 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 21
BUZZ 5.750 0.250 D/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 21
CLAR 6.000 0.500 C*2 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 22
BUZZ 6.000 0.500 C/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 22
CLAR 6.500 0.250 B 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 23
BUZZ 6.500 0.250 D/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 23
CLAR 6.750 0.250 A 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 24
BUZZ 6.750 0.250 E/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 24
CLAR 7.000 0.250 G 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 25
BUZZ 7.000 0.250 F/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 25
CLAR 7.250 0.250 F 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 26
BUZZ 7.250 0.250 G/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 26
CLAR 7.500 0.250 E 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 27
BUZZ 7.500 0.250 A/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 27
CLAR 7.750 0.250 D 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 28
BUZZ 7.750 0.250 B/2 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 28
CLAR 8.000 1.000 C 0.700 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F4
;PRINT P1;< CLAR 29
BUZZ 8.000 1.000 C 1.000 F2 0.000 0.000 0.000 0.000 0.000
0.000 0.080 F6
;PRINT P1;< BUZZ 29
FINISH; < CSCA1.SCR